home *** CD-ROM | disk | FTP | other *** search
/ Belgian Amiga Club - ADF Collection / BS1 part 60.zip / BS1 part 60 / Prof. Calc d1.adf / misc / Install-Proc.bak < prev    next >
AmigaDOS Script File  |  1993-03-23  |  4KB  |  140 lines
  1. .KEY dest
  2. .BRA {
  3. .KET }
  4.  
  5. ;
  6. ; Do the PCalc installation:
  7. ;
  8. ; Inputs:
  9. ;    dest  Where stuff should go.
  10.  
  11.  
  12. IF NOT EXISTS "PCalcInstDest:ProCalc"
  13.    ECHO "     Creating Directory {dest}ProCalc ..."
  14.    MAKEDIR "PCalcInstDest:ProCalc"
  15.    COPY RAM:PCalcInstall/icons/empty.info "PCalcInstDest:ProCalc.info"
  16. ;   INSTUTIL reseticon "PCalcInstDest:ProCalc"
  17. ENDIF
  18.  
  19. Echo >ram:BlottoCD "CD PCalcInstDest:ProCalc"
  20.  
  21. ; Install the program itself.
  22.  
  23. INSTUTIL ask -dy "Install the Professional Calc program [Y/N]? Y"
  24. IF NOT WARN
  25.  
  26.         ECHO "*N     Copying Professional Calc program ...*N"
  27.         COPY ProCalc:ProCalc "PCalcInstDest:ProCalc/ProCalc"
  28.         COPY ProCalc:ProCalc.info "PCalcInstDest:ProCalc/ProCalc.info"
  29.         COPY ProCalc:Prolog.ps "PCalcInstDest:ProCalc/Prolog.ps"
  30.         INSTUTIL reseticon "PCalcInstDest:ProCalc/ProCalc"
  31.  
  32. ENDIF
  33.  
  34. ECHO "*N"
  35. INSTUTIL ask -dy "Install ProCalc ARexx files [Y/N]? Y"
  36. IF NOT warn
  37.  
  38.    IF NOT EXISTS "PCalcInstDest:ProCalc/Rexx"
  39.       MAKEDIR "PCalcInstDest:ProCalc/Rexx"
  40.    ENDIF
  41.  
  42.    COPY ProCalc:Rexx "PCalcInstDest:ProCalc/Rexx" ALL QUIET
  43.  
  44. ENDIF
  45.  
  46.  
  47. ASSIGN PCalcInst:
  48.  
  49. ECHO "*N"
  50. INSTUTIL ask -dy "Copy Example Files to {dest}ProCalc [Y/N]? Y"
  51. IF NOT warn
  52.  
  53.    EXECUTE RAM:PCalcInstall/DiskMount "Examples Disk" Examples: PCalcInst:
  54.  
  55.    IF NOT EXISTS "PCalcInstDest:ProCalc/Worksheets"
  56.       MAKEDIR "PCalcInstDest:ProCalc/Worksheets"
  57.    ENDIF
  58.  
  59.    ECHO "*N     Copying Professional Calc examples ...*N"
  60.    COPY PCalcInst: "PCalcInstDest:ProCalc/Worksheets" ALL QUIET
  61.    COPY RAM:PCalcInstall/icons/empty.info "PCalcInstDest:ProCalc/Worksheets.info"
  62.    INSTUTIL reseticon "PCalcInstDest:ProCalc/Worksheets"
  63.  
  64. ENDIF
  65.  
  66. ASSIGN PCalcInst:
  67. ECHO "*N"
  68. ECHO "*N"
  69. EXECUTE RAM:PCalcInstall/DiskMount "Utilities Disk" Utilities: PCalcInst:
  70.  
  71. ECHO "*N"
  72. INSTUTIL ask -dy "Copy ProCalc fonts to FONTS: directory [Y/N]? Y"
  73. IF NOT warn
  74.  
  75.    FAILAT 21
  76.    ECHO "*N     Copying fonts to FONTS:"
  77.    COPY PCalcInst:fonts FONTS: ALL QUIET
  78.    IF error
  79.       ECHO "*N      Not enough room on the FONTS: directory*N"
  80.    ENDIF
  81.    FAILAT 10
  82.  
  83. ELSE
  84.  
  85.    INSTUTIL ask -dy "Copy PCalc fonts to {dest}ProCalc/Fonts [Y/N]? Y"
  86.    IF NOT warn
  87.  
  88.       ECHO "*N     Copying fonts to {dest}ProCalc/Fonts..."
  89.       IF NOT EXISTS "PCalcInstDest:ProCalc/Fonts"
  90.          MAKEDIR "PCalcInstDest:ProCalc/Fonts"
  91.       ENDIF
  92.       COPY PCalcInst:fonts "PCalcInstDest:ProCalc/Fonts" ALL QUIET
  93.  
  94.       ;
  95.       ; Make a couple of IconX files to switch between PCalc and normal fonts.
  96.       ;
  97.       CD RAM:PCalcInstall
  98.       ECHO >SelPC.1 "Echo *"Selecting Professional Calc fonts: *" NOLINE"
  99.       ECHO >SelPC.2 "Assign FONTS: *"{dest}ProCalc/Fonts*""
  100.       ECHO >Sel.Done "Echo *"Done.*""
  101.       JOIN SelPC.1 SelPC.2 Sel.Done AS "PCalcInstDest:ProCalc/ProCalcFonts"
  102.       COPY RAM:PCalcInstall/Icons/ProCalcFonts.info "PCalcInstDest:ProCalc/ProCalcFonts.info"
  103.  
  104.       ECHO >SelAm.1 "Echo *"Selecting Amiga fonts: *" NOLINE"
  105.       ECHO >SelAm.2a "Assign FONTS: " NOLINE
  106.  
  107.       CD FONTS:
  108.       CD >RAM:PCalcInstall/SelAm.2b
  109.       CD RAM:PCalcInstall
  110.  
  111.       JOIN SelAm.1 SelAm.2a SelAm.2b Sel.Done AS "PCalcInstDest:ProCalc/AmigaFonts"
  112.       COPY RAM:PCalcInstall/Icons/AmigaFonts.info "PCalcInstDest:ProCalc/AmigaFonts.info"
  113.       INSTUTIL reseticon "PCalcInstDest:ProCalc/ProCalcFonts"
  114.       INSTUTIL reseticon "PCalcInstDest:ProCalc/AmigaFonts"
  115.  
  116.    ENDIF
  117.  
  118. ENDIF
  119.  
  120. ;
  121. ; The Assign commands for startup-sequence
  122. ;
  123. ;CD RAM:PCalcInstall
  124. ;ECHO >AsnPCalc     "ASSIGN ProCalc:     *"{dest}ProCalc*""
  125.  
  126. ;VERSION >nil: graphics.library 36
  127.  
  128. ;IF NOT WARN
  129. ;   IF NOT EXISTS SYS:WBStartup
  130. ;      MAKEDIR SYS:WBStartup
  131. ;   ENDIF
  132. ;   COPY AsnPCalc SYS:WBStartup/ProCalcStartup
  133. ;   COPY RAM:PCalcInstall/icons/ProCalcStartup.info SYS:WBStartup
  134. ;   INSTUTIL reseticon SYS:WBStartup/ProCalcStartup
  135. ;ELSE
  136. ;   COPY AsnPCalc S:ProCalcStartup
  137. ;ENDIF
  138.  
  139.  
  140.